home *** CD-ROM | disk | FTP | other *** search
/ Languguage OS 2 / Languguage OS II Version 10-94 (Knowledge Media)(1994).ISO / gnu / nihcl-30.lha / nihcl-3.0 / test / seqcltn.v < prev    next >
Text File  |  1990-05-19  |  381b  |  22 lines
  1.  
  2. Test class SeqCltn
  3. b = (1,1)
  4. (1,2)
  5. (1,3)
  6. (1,3)
  7. b.first() == b.SeqCltn::first(): 1
  8. b.last() == b.SeqCltn::last(): 1
  9. b.hash() == b.SeqCltn::hash(): 1
  10. b.indexOf(D) == b.SeqCltn::indexOf(D): 1
  11. b.occurrencesOf(D) == b.SeqCltn::occurrencesOf(D): 1
  12. c = (1,1)
  13. (1,2)
  14. (1,3)
  15. (1,3)
  16. b.isEqual(c) == b.SeqCltn::isEqual(c): 1
  17. c = (1,1)
  18. (1,2)
  19. (1,3)
  20. (0,0)
  21. b.isEqual(c) == b.SeqCltn::isEqual(c): 1
  22.